home *** CD-ROM | disk | FTP | other *** search
/ Workbench Design / WB Collection.iso / datatypes / clidt / source / rcs / classbase.i,v < prev    next >
Encoding:
Text File  |  1996-04-07  |  1.8 KB  |  117 lines
  1. head    39.2;
  2. access;
  3. symbols
  4.     V39_2:39.2
  5.     V39_1:39.1;
  6. locks; strict;
  7. comment    @# @;
  8.  
  9.  
  10. 39.2
  11. date    95.11.13.23.45.50;    author StRuppert;    state Exp;
  12. branches;
  13. next    39.1;
  14.  
  15. 39.1
  16. date    95.08.07.23.46.06;    author StRuppert;    state Exp;
  17. branches;
  18. next    ;
  19.  
  20.  
  21. desc
  22. @initial
  23. @
  24.  
  25.  
  26. 39.2
  27. log
  28. @*** empty log    message    ***
  29. @
  30. text
  31. @;
  32. ; $PROJECT: cli.datatype
  33. ;
  34. ; $VER: classbase.i 39.1 (06.08.95)
  35. ;
  36. ; by
  37. ;
  38. ; Stefan Ruppert , Windthorststrasse 5 , 65439 Floersheim , GERMANY
  39. ;
  40. ; (C) Copyright 1995
  41. ; All Rights Reserved !
  42. ;
  43. ; $HISTORY:
  44. ;
  45. ; 06.08.95 : 039.001 : initial
  46. ;
  47.  
  48.           IFND CLASSBASE_I
  49. CLASSBASE_I SET 1
  50.  
  51. ;-----------------------------------------------------------------------
  52.  
  53.           INCLUDE "exec/types.i"
  54.           INCLUDE "exec/libraries.i"
  55.           INCLUDE "exec/lists.i"
  56.           INCLUDE "exec/semaphores.i"
  57.           INCLUDE "utility/tagitem.i"
  58.  
  59.           INCLUDE "cli_rev.i"
  60.  
  61. ;-----------------------------------------------------------------------
  62.  
  63.     STRUCTURE ClassBase,LIB_SIZE
  64.           UWORD   cb_UniqueCnt
  65.           ULONG   cb_SysBase
  66.           ULONG   cb_DOSBase
  67.           ULONG   cb_IntuitionBase
  68.           ULONG   cb_GfxBase
  69.           ULONG   cb_UtilityBase
  70.           ULONG   cb_DataTypesBase
  71.           ULONG   cb_SegList
  72.           STRUCT  cb_Lock,SS_SIZE
  73.           ULONG   cb_Class
  74.     LABEL ClassBase_SIZEOF
  75.  
  76.  
  77. ENGINE         equ _ObtainCliEngine
  78.  
  79.           XREF _ObtainCliEngine
  80.  
  81. ;-----------------------------------------------------------------------
  82.  
  83.           LIBINIT
  84.  
  85.           LIBDEF  _LVODispatch
  86.  
  87. ;-----------------------------------------------------------------------
  88.  
  89. CALL MACRO <Function_Name>
  90.           xref _LVO\1
  91.           jsr _LVO\1(A6)
  92.       ENDM
  93.  
  94. ;-----------------------------------------------------------------------
  95.  
  96. GO   MACRO <Function_Name>
  97.           xref _LVO\1
  98.           jmp _LVO\1(A6)
  99.       ENDM
  100.  
  101. ;----------------------------------------------------------------------
  102.  
  103.           ENDC    ; CLASSBASE_I
  104.  
  105. @
  106.  
  107.  
  108. 39.1
  109. log
  110. @*** empty log    message    ***
  111. @
  112. text
  113. @d40 1
  114. a40 1
  115.           ULONG   cb_SuperClassBase
  116. @
  117.